// HEXUAL - by Erik Loyer (erik@marrowmonkey.com)

// Displays multiple hexagons.  Amplitude of the sound determines how large and how far from the center of the screen the hexagons get.

// Thanks, Andy, for creating G-Force and WhiteCap!

// Please visit my experimental Shockwave site, The Lair of the Marrow Monkey, at www.marrowmonkey.com.

Aspc=1,

A0="20.0",
A1="A0 / 2.0",

B0="mag(.1)",
B1=".4 * (rnd(A0 * mag(.1)) - (A1 * mag(.1)))",
B2=".4 * (rnd(A0 * mag(.1)) - (A1 * mag(.1)))",
B3=".4 * (rnd(A0 * mag(.3)) - (A1 * mag(.3)))",
B4=".4 * (rnd(A0 * mag(.3)) - (A1 * mag(.3)))",
B5=".4 * (rnd(A0 * mag(.5)) - (A1 * mag(.5)))",
B6=".4 * (rnd(A0 * mag(.5)) - (A1 * mag(.5)))",
B7=".4 * (rnd(A0 * mag(.7)) - (A1 * mag(.7)))",
B8=".4 * (rnd(A0 * mag(.7)) - (A1 * mag(.7)))",
B9=".4 * (rnd(A0 * mag(.9)) - (A1 * mag(.9)))",
B10=".4 * (rnd(A0 * mag(.9)) - (A1 * mag(.9)))",

C0="mag( s ) * 0.25 + .2",
C1="2.1 * ( s - .5 )",

Pen="1",
X0="(mag(.1) * cos(s * (3.1415 * 2))) + B1",
Y0="(mag(.1) * sin(s * (3.1415 * 2))) + B2",
X1="(mag(.3) * cos(s * (3.1415 * 2))) + B3",
Y1="(mag(.3) * sin(s * (3.1415 * 2))) + B4",
X2="(mag(.5) * cos(s * (3.1415 * 2))) + B5",
Y2="(mag(.5) * sin(s * (3.1415 * 2))) + B6",
X3="(mag(.7) * cos(s * (3.1415 * 2))) + B7",
Y3="(mag(.7) * sin(s * (3.1415 * 2))) + B8",
X4="(mag(.9) * cos(s * (3.1415 * 2))) + B9",
Y4="(mag(.9) * sin(s * (3.1415 * 2))) + B10",

Stps=7,

ConB=1,

Vers=100